Form1
Test sorted list box
Form1
List1
Label1
Search item:
Text1
Command1
Search
Command2
Label2
Search results:
Text2
Form_Click
list1
List1_Click
BinarySearch
Search
ListBox
First
NbrRecs
	ListCount
Found
CurrentLowItemNbr
CurrentHiItemNbr
CurrentLoItemNbr
CurrentMidItemNbrE
LoNbrR
HiNbri
	LoItemNbr
	HiItemNbr
MidNbr
LineNbr
Command1_Click
Text1
Text2
@	Form_Load
Command2_Click
BinarySearch
Item not found yet
Search the low portion of the list
Search the high portion of the list
Found it
Return record number
Return success code'
Command1_Click
Not Found"
Form_Load
Command2_Click